home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / src / machserver / 1.098 / libc / Time_Divide.c < prev    next >
Encoding:
C/C++ Source or Header  |  1988-06-28  |  2.5 KB  |  94 lines
  1. /* 
  2.  * Time_Divide.c --
  3.  *
  4.  *    Source code for the Time_Divide library procedure.
  5.  *
  6.  * Copyright 1988 Regents of the University of California
  7.  * Permission to use, copy, modify, and distribute this
  8.  * software and its documentation for any purpose and without
  9.  * fee is hereby granted, provided that the above copyright
  10.  * notice appear in all copies.  The University of California
  11.  * makes no representations about the suitability of this
  12.  * software for any purpose.  It is provided "as is" without
  13.  * express or implied warranty.
  14.  */
  15.  
  16. #ifndef lint
  17. static char rcsid[] = "$Header: Time_Divide.c,v 1.2 88/06/27 17:23:31 ouster Exp $ SPRITE (Berkeley)";
  18. #endif not lint
  19.  
  20. #include <sprite.h>
  21. #include <spriteTime.h>
  22.  
  23. /*
  24.  * OVERFLOW is used to see if multiple precision multiplication
  25.  * and division are required in the Time_Multiply  and Time_Divide routines.
  26.  * The number is equal to (2 ** 31 - 1) / 1000000.
  27.  */
  28.  
  29. #define OVERFLOW 2147
  30.  
  31. /*
  32.  *----------------------------------------------------------------------
  33.  *
  34.  * Time_Divide --
  35.  *
  36.  *      Computes a fraction of a time value.
  37.  *    E.g. computes a time of a quarter second given the 
  38.  *    constant time_OneSecond and a factor of 4.
  39.  *
  40.  * Results:
  41.  *     The quotient of the division of the time value by the factor.
  42.  *
  43.  * Side effects:
  44.  *     None.
  45.  *
  46.  *----------------------------------------------------------------------
  47.  */
  48.  
  49. void
  50. Time_Divide(time, factor, resultPtr)
  51.     Time          time;
  52.     int              factor;
  53.     register Time *resultPtr;
  54. {
  55.     register int     mod;
  56.  
  57.     if (factor != 0) {
  58.     /*
  59.      * If there is a remainder from dividing the seconds portion by the
  60.      * factor, convert it to microseconds and add it to the microseconds 
  61.      * portion. This will make the division of microseconds by factor 
  62.      * accurate.
  63.      */
  64.  
  65.     resultPtr->seconds    = time.seconds / factor;
  66.     mod               = time.seconds % factor;
  67.  
  68.     /*
  69.      * Check to see if the multiplication involving mod will overflow.
  70.      * If so, use floating point (which is expensive).
  71.      */
  72.  
  73.     if (mod > OVERFLOW) {
  74.         resultPtr->microseconds = (((double) mod * (double) ONE_SECOND) +
  75.                      (double) time.microseconds) / (double) factor;
  76.     } else {
  77.         resultPtr->microseconds = ((mod * ONE_SECOND) + 
  78.                     time.microseconds) / factor;
  79.     }
  80.  
  81.     while (resultPtr->microseconds >= ONE_SECOND) {
  82.         resultPtr->seconds        += 1;
  83.         resultPtr->microseconds    -= ONE_SECOND;
  84.     }
  85.     while (resultPtr->microseconds < 0) {
  86.         resultPtr->seconds        -= 1;
  87.         resultPtr->microseconds    += ONE_SECOND;
  88.     }
  89.     } else {
  90.     resultPtr->seconds    = 0;
  91.     resultPtr->microseconds    = 0;
  92.     }
  93. }
  94.